home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1986 July / 1986-07.d64 / 64 mode speed up (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1986-01-01  |  603 b   |  19 lines
  1. 10 print"[147]this program only works on the 128      in 64 mode"
  2. 20 fori=49152to49258:readx:c=c+x:pokei,x:next
  3. 30 ifc<>12470thenprint"data error":end
  4. 40 sys 49152
  5. 50 data 120,173,105,192,141,18,208,173
  6. 60 data 17,208,41,127,141,17,208,169
  7. 70 data 129,141,26,208,169,192,160,32
  8. 80 data 141,21,3,140,20,3,88,96
  9. 90 data 173,25,208,141,25,208,41,1
  10. 100 data 208,3,76,49,234,173,18,208
  11. 110 data 205,106,192,176,14,172,106,192
  12. 120 data 140,18,208,169,0,141,48,208
  13. 130 data 76,78,192,172,105,192,140,18
  14. 140 data 208,169,1,141,48,208,104,168
  15. 150 data 104,170,104,64,120,169,234,141
  16. 160 data 21,3,169,49,141,20,3,169
  17. 170 data 0,141,48,208,141,26,208,88
  18. 180 data 96,50,250
  19.